home *** CD-ROM | disk | FTP | other *** search
Text File | 1999-12-20 | 2.7 KB | 88 lines | [TEXT/ToyS] |
- tell application "iView Multimedia 3.7.1"
-
-
- -- A SIMPLE ONE TO GET STARTED
- -- count objects in window 1
-
-
- -- THE FOLLOWING SAMPLES DEMOSTRATE HOW TO GET/SET
- -- A LIST OF PROPERTIES GROUPED IN AN APPLE SCRIPT RECORD
- -- tell window 1
- -- [ get generic properties of a single object (read only) ]
- -- get the properties of object 1
- -- get the name of object 1
- -- get the name of object before object 3
-
- -- [ get media properties of a single object (read only) ]
- -- get the media info of object 1
- -- get the file type of the media info of object 1
-
- -- [ get digital camera info of a single object (read only) ]
- -- get the photo info of object 13
- -- get the camera of the photo info of object 13
- -- get the ISO speed of object 13
-
- -- [ various samples for getting/setting annotations of a single object ]
- -- get the annotations of object 1
-
- -- set temp to the annotations of object 1
- -- get the caption of temp
- -- or
- -- get the caption of the annotations of object 1
- -- or
- -- get the caption of object 1
- -- get the data size of the caption of object 1
-
- -- set the annotations of object 3 to {caption:"ae caption", writer:"ae writer"}
- -- set the annotations of object 3 to {keywords:{"aekey1", "aekey2", "aekey3", "aekey4"}}
-
- -- set the keywords of object 6 to the keywords of object 1
-
- -- set myKeys to the keywords of object 1
- -- if get the number of items in myKeys ≥ 1 then
- -- set item 1 of myKeys to "changed key 1"
- -- set the keywords of object 1 to myKeys
- -- end if
- -- end tell
-
-
- -- GET ID'S FOR OBJECTS WITH DESIRED PROPERTIES
- -- tell window 1
- -- get the name of every object of window 1
- -- get the name of every object whose mark id is not 0
- -- get the index of every object whose name contains "00"
- -- set the mark id of every object whose name contains "00" to 2
- -- set the annotations of every object whose name contains "00" to {caption:"hisser"}
- -- end tell
-
-
- -- MOVE & DELETE MEDIA OBJECTS
- -- tell window 1
- -- delete (every object whose name contains "mac")
- -- end tell
-
- -- this one has a bug
- -- get the index of every object of every window -- whose name contains "ac"
-
- -- AND FINALLY A COMPLEX ONE TO CLOSE...
- -- set x to (the index of the second object of window 1 whose name contains "julian") as integer
- -- set the annotations of object x of window 1 to {caption:"hisser*"}
-
-
- end tell
-
-
- -- A snippet that demonstrates how to grab
- -- a thumbnail from an iView catalog.
- -- on getThumbnail()
- -- tell application "iView Multimedia PPC"
- -- tell window 1
- -- set theThumb to the thumbnail of object 2 as picture
- -- end tell
- -- end tell
- --
- -- tell application "Finder"
- -- activate
- -- set the clipboard to theThumb as picture
- -- end tell
- --end getThumbnail